home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2002 November / SGI IRIX Base Documentation 2002 November.iso / usr / share / catman / p_man / cat3 / SCSL / dlaein.z / dlaein
Encoding:
Text File  |  2002-10-03  |  5.0 KB  |  133 lines
  1.  
  2.  
  3.  
  4. DDDDLLLLAAAAEEEEIIIINNNN((((3333SSSS))))                                                          DDDDLLLLAAAAEEEEIIIINNNN((((3333SSSS))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DLAEIN - use inverse iteration to find a right or left eigenvector
  10.      corresponding to the eigenvalue (WR,WI) of a real upper Hessenberg matrix
  11.      H
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      SUBROUTINE DLAEIN( RIGHTV, NOINIT, N, H, LDH, WR, WI, VR, VI, B, LDB,
  15.                         WORK, EPS3, SMLNUM, BIGNUM, INFO )
  16.  
  17.          LOGICAL        NOINIT, RIGHTV
  18.  
  19.          INTEGER        INFO, LDB, LDH, N
  20.  
  21.          DOUBLE         PRECISION BIGNUM, EPS3, SMLNUM, WI, WR
  22.  
  23.          DOUBLE         PRECISION B( LDB, * ), H( LDH, * ), VI( * ), VR( * ),
  24.                         WORK( * )
  25.  
  26. IIIIMMMMPPPPLLLLEEEEMMMMEEEENNNNTTTTAAAATTTTIIIIOOOONNNN
  27.      These routines are part of the SCSL Scientific Library and can be loaded
  28.      using either the -lscs or the -lscs_mp option.  The -lscs_mp option
  29.      directs the linker to use the multi-processor version of the library.
  30.  
  31.      When linking to SCSL with -lscs or -lscs_mp, the default integer size is
  32.      4 bytes (32 bits). Another version of SCSL is available in which integers
  33.      are 8 bytes (64 bits).  This version allows the user access to larger
  34.      memory sizes and helps when porting legacy Cray codes.  It can be loaded
  35.      by using the -lscs_i8 option or the -lscs_i8_mp option. A program may use
  36.      only one of the two versions; 4-byte integer and 8-byte integer library
  37.      calls cannot be mixed.
  38.  
  39. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  40.      DLAEIN uses inverse iteration to find a right or left eigenvector
  41.      corresponding to the eigenvalue (WR,WI) of a real upper Hessenberg matrix
  42.      H.
  43.  
  44. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  45.      RIGHTV   (input) LOGICAL
  46.               = .TRUE. : compute right eigenvector;
  47.               = .FALSE.: compute left eigenvector.
  48.  
  49.      NOINIT   (input) LOGICAL
  50.               = .TRUE. : no initial vector supplied in (VR,VI).
  51.               = .FALSE.: initial vector supplied in (VR,VI).
  52.  
  53.      N       (input) INTEGER
  54.              The order of the matrix H.  N >= 0.
  55.  
  56.      H       (input) DOUBLE PRECISION array, dimension (LDH,N)
  57.              The upper Hessenberg matrix H.
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. DDDDLLLLAAAAEEEEIIIINNNN((((3333SSSS))))                                                          DDDDLLLLAAAAEEEEIIIINNNN((((3333SSSS))))
  71.  
  72.  
  73.  
  74.      LDH     (input) INTEGER
  75.              The leading dimension of the array H.  LDH >= max(1,N).
  76.  
  77.      WR      (input) DOUBLE PRECISION
  78.              WI      (input) DOUBLE PRECISION The real and imaginary parts of
  79.              the eigenvalue of H whose corresponding right or left eigenvector
  80.              is to be computed.
  81.  
  82.      VR      (input/output) DOUBLE PRECISION array, dimension (N)
  83.              VI      (input/output) DOUBLE PRECISION array, dimension (N) On
  84.              entry, if NOINIT = .FALSE. and WI = 0.0, VR must contain a real
  85.              starting vector for inverse iteration using the real eigenvalue
  86.              WR; if NOINIT = .FALSE. and WI.ne.0.0, VR and VI must contain the
  87.              real and imaginary parts of a complex starting vector for inverse
  88.              iteration using the complex eigenvalue (WR,WI); otherwise VR and
  89.              VI need not be set.  On exit, if WI = 0.0 (real eigenvalue), VR
  90.              contains the computed real eigenvector; if WI.ne.0.0 (complex
  91.              eigenvalue), VR and VI contain the real and imaginary parts of
  92.              the computed complex eigenvector. The eigenvector is normalized
  93.              so that the component of largest magnitude has magnitude 1; here
  94.              the magnitude of a complex number (x,y) is taken to be |x| + |y|.
  95.              VI is not referenced if WI = 0.0.
  96.  
  97.      B       (workspace) DOUBLE PRECISION array, dimension (LDB,N)
  98.  
  99.      LDB     (input) INTEGER
  100.              The leading dimension of the array B.  LDB >= N+1.
  101.  
  102.      WORK   (workspace) DOUBLE PRECISION array, dimension (N)
  103.  
  104.      EPS3    (input) DOUBLE PRECISION
  105.              A small machine-dependent value which is used to perturb close
  106.              eigenvalues, and to replace zero pivots.
  107.  
  108.      SMLNUM  (input) DOUBLE PRECISION
  109.              A machine-dependent value close to the underflow threshold.
  110.  
  111.      BIGNUM  (input) DOUBLE PRECISION
  112.              A machine-dependent value close to the overflow threshold.
  113.  
  114.      INFO    (output) INTEGER
  115.              = 0:  successful exit
  116.              = 1:  inverse iteration did not converge; VR is set to the last
  117.              iterate, and so is VI if WI.ne.0.0.
  118.  
  119. SSSSEEEEEEEE AAAALLLLSSSSOOOO
  120.      INTRO_LAPACK(3S), INTRO_SCSL(3S)
  121.  
  122.      This man page is available only online.
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.